From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 15 Nov 1995 17:42:44 +0000 (+0000)
Subject: (mark_object): Don't overwrite original argument value.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~85516
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=436c581148833e54c3532d50b7770c94cc70d443;p=emacs.git

(mark_object): Don't overwrite original argument value.
---

diff --git a/src/alloc.c b/src/alloc.c
index 978174360b2..539539c49cd 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -1699,9 +1699,10 @@ Lisp_Object *last_marked[LAST_MARKED_SIZE];
 int last_marked_index;
 
 static void
-mark_object (objptr)
-     Lisp_Object *objptr;
+mark_object (argptr)
+     Lisp_Object *argptr;
 {
+  Lisp_Object *objptr = argptr;
   register Lisp_Object obj;
 
  loop: